home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Format CD 43
/
Amiga Format CD43 (1999)(Future Publishing)(GB)(Track 1 of 2)[!][issue 1999-09].iso
/
-serious-
/
graphics
/
fxforge
/
raversfilters
/
elliptic button
< prev
next >
Wrap
Text File
|
1999-06-15
|
919b
|
33 lines
Category: Harry's Button Tools
Title: Elliptic Button
Copyright: Copyright 1998 by harry@visca.com
Author: Harry the Raver
Filename: Elipbutt.8bf
R:put(scl(d+ctl(4),0,-511,0,255),1),put(scl(d-ctl(4),1,512,0,255),2),put(c2m(x*255/X-ctl(1),y*255/Y-ctl(2)),3),get(3)>ctl(0)?ctl(7):get(3)>ctl(0)-val(3,0,255)?d<0?c+get(1)/val(5,8,1):c+get(2)/val(5,8,1):ctl(6)<127?c:d<0?c-get(1):c-get(2)
G:get(3)>ctl(0)?ctl(7):get(3)>ctl(0)-val(3,0,255)?d<0?c+get(1)/val(5,8,1):c+get(2)/val(5,8,1):ctl(6)<127?c:d<0?c-get(1):c-get(2)
B:get(3)>ctl(0)?ctl(7):get(3)>ctl(0)-val(3,0,255)?d<0?c+get(1)/val(5,8,1):c+get(2)/val(5,8,1):ctl(6)<127?c:d<0?c-get(1):c-get(2)
A:a
ctl[0]: Zoom
ctl[1]: X Shift
ctl[2]: Y Shift
ctl[3]: Bevel Size
ctl[4]: Contrast
ctl[5]: Height
ctl[6]: Raised/Sunken
ctl[7]: Background
val[0]: 108
val[1]: 126
val[2]: 126
val[3]: 18
val[4]: 255
val[5]: 255
val[6]: 0
val[7]: 128